home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Info-Mac 4
/
Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso
/
Development
/
Source
/
DBL Pascal Library
/
DebuggerTest ƒ
/
DebuggerTest_Test.p
< prev
next >
Wrap
Text File
|
1993-12-17
|
331b
|
19 lines
program DebuggerTest_Test;
uses
DebuggerTest;
var
present, active: Boolean;
kind: DebuggerKind;
signature: DebuggerSignature;
actualDelay: Longint;
begin
ShowText;
GetDebuggerInfo(present, active, kind, signature);
WriteLn(present, ' ', kind, ' ', signature);
WriteLn(ABZmonIsLoaded);
repeat
until Button;
end.